object frmProductSelect: TfrmProductSelect
  Left = 413
  Top = 47
  Width = 763
  Height = 637
  Caption = #21830#21697#36873#25321#22120
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object RzPanel1: TRzPanel
    Left = 0
    Top = 0
    Width = 747
    Height = 73
    Align = alTop
    BorderOuter = fsGroove
    TabOrder = 0
    object Label2: TLabel
      Left = 8
      Top = 16
      Width = 73
      Height = 13
      AutoSize = False
      Caption = #26597#35810#30721
    end
    object Label1: TLabel
      Left = 6
      Top = 40
      Width = 73
      Height = 13
      AutoSize = False
      Caption = #21697#21517#35268#26684
    end
    object Label3: TLabel
      Left = 224
      Top = 16
      Width = 73
      Height = 13
      AutoSize = False
      Caption = #21830#21697#22411#21495
    end
    object edtSpell: TRzEdit
      Left = 64
      Top = 14
      Width = 150
      Height = 21
      TabOrder = 0
      OnKeyPress = edtSpellKeyPress
    end
    object btnSearcher: TRzBitBtn
      Left = 429
      Top = 10
      Caption = #26597#25214
      TabOrder = 3
      OnClick = btnSearcherClick
    end
    object RzBitBtn3: TRzBitBtn
      Left = 431
      Top = 45
      Caption = #37325#32622
      TabOrder = 5
      OnClick = RzBitBtn3Click
    end
    object btnselect: TRzBitBtn
      Left = 509
      Top = 11
      Caption = #36873#25321
      TabOrder = 4
      OnClick = btnselectClick
    end
    object edtProductName: TRzEdit
      Left = 64
      Top = 40
      Width = 153
      Height = 21
      TabOrder = 1
      OnKeyPress = edtProductNameKeyPress
    end
    object edtProductModel: TRzEdit
      Left = 288
      Top = 14
      Width = 128
      Height = 21
      TabOrder = 2
      OnKeyPress = edtProductModelKeyPress
    end
    object btnProductAdd: TRzBitBtn
      Left = 664
      Top = 8
      Caption = #26032#22686#21830#21697
      TabOrder = 6
      OnClick = btnProductAddClick
    end
    object btnProductEdit: TRzBitBtn
      Left = 664
      Top = 40
      Caption = #20462#25913#21830#21697
      TabOrder = 7
      OnClick = btnProductEditClick
    end
  end
  object DBGridEhProduct: TDBGridEh
    Left = 0
    Top = 73
    Width = 747
    Height = 274
    Align = alClient
    DataGrouping.GroupLevels = <>
    DataSource = dsProduct
    EvenRowColor = clInactiveBorder
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    FrozenCols = 3
    Options = [dgTitles, dgIndicator, dgColumnResize, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghAutoSortMarking, dghDialogFind, dghColumnResize, dghColumnMove]
    RowDetailPanel.Color = clBtnFace
    RowHeight = 25
    SortLocal = True
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    UseMultiTitle = True
    OnCellClick = DBGridEhProductCellClick
    OnDblClick = DBGridEhProductDblClick
    OnDrawColumnCell = DBGridEhProductDrawColumnCell
    OnTitleClick = DBGridEhProductTitleClick
    Columns = <
      item
        EditButtons = <>
        FieldName = 'productid'
        Footers = <>
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'productname'
        Footers = <>
        Width = 180
      end
      item
        EditButtons = <>
        FieldName = 'productmodel'
        Footers = <>
        Width = 162
      end
      item
        EditButtons = <>
        FieldName = 'storageamount'
        Footers = <>
        Title.SortIndex = 1
        Title.SortMarker = smUpEh
        Width = 51
      end
      item
        EditButtons = <>
        FieldName = 'productarea'
        Footer.FieldName = 'productarea'
        Footers = <>
        Width = 80
      end
      item
        EditButtons = <>
        FieldName = 'productunit'
        Footers = <>
        Width = 60
      end
      item
        EditButtons = <>
        FieldName = 'sellprice'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'laststockprice'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'lastsellprice'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'stockprice'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'productnumber'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'sellprice1'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'sellprice2'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'spell'
        Footers = <>
        Width = 80
      end>
    object RowDetailData: TRowDetailPanelControlEh
    end
  end
  object RzStatusBar1: TRzStatusBar
    Left = 0
    Top = 580
    Width = 747
    Height = 19
    BorderInner = fsNone
    BorderOuter = fsNone
    BorderSides = [sdLeft, sdTop, sdRight, sdBottom]
    BorderWidth = 0
    TabOrder = 2
  end
  object DBGridEhPart: TDBGridEh
    Left = 0
    Top = 347
    Width = 747
    Height = 233
    Align = alBottom
    DataGrouping.GroupLevels = <>
    DataSource = dsPart
    EvenRowColor = clInactiveBorder
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghRowHighlight, dghDialogFind, dghColumnResize, dghColumnMove]
    RowDetailPanel.Color = clBtnFace
    RowHeight = 25
    TabOrder = 3
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    UseMultiTitle = True
    Columns = <
      item
        EditButtons = <>
        FieldName = 'orderdate'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'ordernumber'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'clientname'
        Footers = <>
        Width = 140
      end
      item
        EditButtons = <>
        FieldName = 'sellamount'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'sellprice'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'businessman'
        Footers = <>
        Width = 80
      end
      item
        EditButtons = <>
        FieldName = 'actorname'
        Footers = <>
        Width = 80
      end>
    object RowDetailData: TRowDetailPanelControlEh
    end
  end
  object dsProduct: TDataSource
    DataSet = cdsProduct
    Left = 176
    Top = 216
  end
  object cdsProduct: TClientDataSet
    Aggregates = <>
    FetchOnDemand = False
    PacketRecords = 30
    Params = <>
    ReadOnly = True
    Left = 176
    Top = 176
    object cdsProductproductid: TIntegerField
      FieldName = 'productid'
    end
    object cdsProductproductnumber: TStringField
      DisplayLabel = #21830#21697#32534#30721
      FieldName = 'productnumber'
    end
    object cdsProductproductname: TStringField
      DisplayLabel = #21830#21697#21517#31216
      FieldName = 'productname'
    end
    object cdsProductproductmodel: TStringField
      DisplayLabel = #21830#21697#22411#21495
      FieldName = 'productmodel'
    end
    object cdsProductproductunit: TStringField
      DisplayLabel = #21333#20301
      FieldName = 'productunit'
    end
    object cdsProductproductarea: TStringField
      DisplayLabel = #20135#22320
      FieldName = 'productarea'
    end
    object cdsProductspell: TStringField
      DisplayLabel = #26597#35810#30721
      FieldName = 'spell'
      Size = 0
    end
    object cdsProductsellprice: TFloatField
      DisplayLabel = #38646#21806#20215
      FieldName = 'sellprice'
      currency = True
    end
    object cdsProductsellprice1: TFloatField
      DisplayLabel = #38144#21806'1'
      FieldName = 'sellprice1'
      currency = True
    end
    object cdsProductsellprice2: TFloatField
      DisplayLabel = #38144#21806'2'
      FieldName = 'sellprice2'
      currency = True
    end
    object cdsProductstorageamount: TFloatField
      DisplayLabel = #24211#23384
      FieldName = 'storageamount'
    end
    object cdsProductlaststockprice: TFloatField
      DisplayLabel = #26368#26032#36827#20215
      FieldName = 'laststockprice'
      currency = True
    end
    object cdsProductlastsellprice: TFloatField
      DisplayLabel = #26368#26032#38144#20215
      FieldName = 'lastsellprice'
      currency = True
    end
    object cdsProductstockprice: TFloatField
      DisplayLabel = #24211#23384#22343#20215
      FieldName = 'stockprice'
      currency = True
    end
  end
  object cdsPart: TClientDataSet
    Aggregates = <>
    Params = <>
    ReadOnly = True
    Left = 232
    Top = 464
    object cdsPartorderdate: TDateField
      DisplayLabel = #21333#25454#26085#26399
      FieldName = 'orderdate'
    end
    object cdsPartordernumber: TStringField
      DisplayLabel = #21333#25454#32534#21495
      FieldName = 'ordernumber'
    end
    object cdsPartclientname: TStringField
      DisplayLabel = #23458#25143#21517#31216
      FieldName = 'clientname'
      Size = 0
    end
    object cdsPartoutamount: TFloatField
      DisplayLabel = #25968#37327
      FieldName = 'sellamount'
    end
    object cdsPartoutprice: TFloatField
      DisplayLabel = #20215#26684
      FieldName = 'sellprice'
      currency = True
    end
    object cdsPartbusinessman: TStringField
      DisplayLabel = #19994#21153#21592
      FieldName = 'businessman'
    end
    object cdsPartactorname: TStringField
      DisplayLabel = #21046#21333#20154
      FieldName = 'actorname'
    end
  end
  object dsPart: TDataSource
    DataSet = cdsPart
    Left = 304
    Top = 456
  end
end
